home *** CD-ROM | disk | FTP | other *** search
/ CD Actual 1 / PC Actual CD 01.iso / share / dos / graficos / plydat14.arj / COSSPH.PI < prev    next >
Encoding:
Text File  |  1991-12-03  |  692 b   |  35 lines
  1. # Simple demonstration file of a functional texture
  2. # Polyray input file - Alexander Enzmann
  3.  
  4. viewpoint {
  5.    from <0,0,-12>
  6.    at <0,0,0>
  7.    up <0,1,0>
  8.    angle 30
  9.    resolution 160, 160
  10.    }
  11.  
  12. background SkyBlue
  13. light <-10,10,-10>
  14. light < 10,10,-10>
  15.  
  16. define sin_color_offset (sin(3.14 * fmod(x*y*z, 1)) + 1) / 2
  17. define sin_color <sin_color_offset, 0, 1 - sin_color_offset>
  18.  
  19. define xyz_sin_texture
  20. texture {
  21.    special surface {
  22.       color sin_color
  23.       ambient 0.2
  24.       diffuse 0.7
  25.       specular white, 0.2
  26.       microfacet Reitz radians(10)
  27.       }
  28.    }
  29.  
  30. # Create a sphere with a special texture
  31. object {
  32.    sphere <0, 0, 0>, 2
  33.    xyz_sin_texture
  34.    }
  35.